home *** CD-ROM | disk | FTP | other *** search
/ Internet Surfer: Getting Started / Internet Surfer - Getting Started (Wayzata Technology)(7231)(1995).bin / pc / mac / bonus / peter_le / finger_1 / tokens / paramete.uni < prev    next >
Text File  |  1991-12-17  |  933b  |  23 lines
  1. unit ParameterDef;
  2.  
  3. interface
  4.  
  5.     type
  6.         parameterRecord = record
  7.                 fingeredname: stringPtr;            { Input        - finger name }
  8.                 param: stringPtr;                    { Input        - parameter following special }
  9.                 returnvalue: stringPtr;            { Output    - return string, appeneded to finger output.  Don't change ptr! }
  10.                 fingeroutput: handle;                { Input/Output    - finger output as its built. }
  11.                 hlength: longInt;                    { Input    /Output    -  handle length.  }
  12.                 offset: longInt;                        { Input/Output - offset from start of handle that finger output is up to }
  13.                 idle: longInt;                        { Input        - Idle time in seconds }
  14.                 remoteIP: longInt;                    { Input        - IP number of fingerer }
  15.                 expandtokens: boolean;            { Output    - Expand <cr>s and %tokens inserted into the fingeroutput handle }
  16. { Note: No extra expansion is done for strings.  If you have <cr>s in them, put <cr><lf> instead. }
  17.             end;
  18.  
  19. {  procedure Main (var p: parameterRecord); }
  20.  
  21. implementation
  22.  
  23. end.